home *** CD-ROM | disk | FTP | other *** search
/ Chip 2004 December / 2004-12 CHIP.iso / Internet / The Bat! Professional 3.01 / thebat_professional.msi / Data1.cab / thebat.exe / 0 / RCDATA / TMESSAGEFINDER / TMESSAGEFINDER.txt
Text File  |  2004-10-12  |  48KB  |  1,843 lines

  1. object MessageFinder: TMessageFinder
  2.   Left = 249
  3.   Top = 194
  4.   HelpContext = 11021
  5.   AutoScroll = False
  6.   Caption = 'Message Finder'
  7.   ClientHeight = 474
  8.   ClientWidth = 630
  9.   Color = clBtnFace
  10.   Font.Charset = DEFAULT_CHARSET
  11.   Font.Color = clWindowText
  12.   Font.Height = -11
  13.   Font.Name = 'MS Sans Serif'
  14.   Font.Style = []
  15.   KeyPreview = True
  16.   Menu = ViewMenu
  17.   OldCreateOrder = True
  18.   Position = poScreenCenter
  19.   OnActivate = FormActivate
  20.   OnClose = FormClose
  21.   OnCloseQuery = FormCloseQuery
  22.   OnCreate = FormCreate
  23.   OnDeactivate = FormDeactivate
  24.   OnKeyDown = FormKeyDown
  25.   OnShow = FormShow
  26.   PixelsPerInch = 96
  27.   TextHeight = 13
  28.   object MsgCtl: TMessageController
  29.     Left = 360
  30.     Top = 272
  31.     Width = 40
  32.     Height = 33
  33.     MsgView = MLV
  34.   end
  35.   object Split1: TSplitter
  36.     Left = 0
  37.     Top = 238
  38.     Width = 630
  39.     Height = 4
  40.     Cursor = crVSplit
  41.     Align = alTop
  42.     ResizeStyle = rsUpdate
  43.   end
  44.   object bStatus: TStatusBar
  45.     Left = 0
  46.     Top = 455
  47.     Width = 630
  48.     Height = 19
  49.     Panels = <
  50.       item
  51.         Style = psOwnerDraw
  52.         Text = 'Progress'
  53.         Width = 100
  54.       end
  55.       item
  56.         Width = 50
  57.       end>
  58.     OnDrawPanel = bStatusDrawPanel
  59.   end
  60.   object pBookA: TPanel
  61.     Left = 0
  62.     Top = 0
  63.     Width = 630
  64.     Height = 238
  65.     Align = alTop
  66.     BevelOuter = bvNone
  67.     TabOrder = 1
  68.     object pnBook: TPanel
  69.       Left = 0
  70.       Top = 0
  71.       Width = 630
  72.       Height = 238
  73.       Align = alClient
  74.       BevelOuter = bvNone
  75.       BorderWidth = 2
  76.       FullRepaint = False
  77.       TabOrder = 0
  78.       object Book: TPageControl
  79.         Left = 2
  80.         Top = 2
  81.         Width = 500
  82.         Height = 234
  83.         HelpContext = 11021
  84.         ActivePage = tsSearch
  85.         Align = alClient
  86.         TabOrder = 0
  87.         TabStop = False
  88.         object tsSearch: TTabSheet
  89.           Caption = 'Options'
  90.           object sBox: TScrollBox
  91.             Left = 0
  92.             Top = 0
  93.             Width = 492
  94.             Height = 206
  95.             VertScrollBar.Tracking = True
  96.             Align = alClient
  97.             BorderStyle = bsNone
  98.             TabOrder = 0
  99.             OnResize = sBoxResize
  100.             object Label1: TLabel
  101.               Left = 8
  102.               Top = 12
  103.               Width = 52
  104.               Height = 13
  105.               Caption = '&Search for:'
  106.             end
  107.             object lbLookIn: TLabel
  108.               Left = 176
  109.               Top = 40
  110.               Width = 38
  111.               Height = 13
  112.               Caption = '&Look in:'
  113.               FocusControl = cbTarget
  114.               Transparent = True
  115.               Layout = tlBottom
  116.             end
  117.             object gbScope: TGroupBox
  118.               Left = 4
  119.               Top = 32
  120.               Width = 161
  121.               Height = 161
  122.               Caption = 'Scope'
  123.               TabOrder = 1
  124.               object cbAnywhere: TCheckBox
  125.                 Left = 8
  126.                 Top = 16
  127.                 Width = 145
  128.                 Height = 17
  129.                 Caption = 'Any&where'
  130.                 Checked = True
  131.                 State = cbChecked
  132.                 TabOrder = 0
  133.                 OnClick = cbAnywhereClick
  134.               end
  135.               object cbSender: TCheckBox
  136.                 Left = 8
  137.                 Top = 36
  138.                 Width = 145
  139.                 Height = 17
  140.                 Caption = 'Se&nder'
  141.                 TabOrder = 1
  142.                 OnClick = cbSenderClick
  143.               end
  144.               object cbRecipient: TCheckBox
  145.                 Left = 8
  146.                 Top = 56
  147.                 Width = 145
  148.                 Height = 17
  149.                 Caption = '&Recipient'
  150.                 TabOrder = 2
  151.                 OnClick = cbSenderClick
  152.               end
  153.               object cbSubj: TCheckBox
  154.                 Left = 8
  155.                 Top = 76
  156.                 Width = 145
  157.                 Height = 17
  158.                 Caption = 'Sub&ject'
  159.                 TabOrder = 3
  160.                 OnClick = cbSenderClick
  161.               end
  162.               object cbHeaders: TCheckBox
  163.                 Left = 8
  164.                 Top = 96
  165.                 Width = 145
  166.                 Height = 17
  167.                 Caption = 'Hea&ders'
  168.                 TabOrder = 4
  169.                 OnClick = cbSenderClick
  170.               end
  171.               object cbBody: TCheckBox
  172.                 Left = 8
  173.                 Top = 140
  174.                 Width = 145
  175.                 Height = 17
  176.                 Caption = '&Body'
  177.                 TabOrder = 6
  178.                 OnClick = cbSenderClick
  179.               end
  180.               object cbMemo: TCheckBox
  181.                 Left = 8
  182.                 Top = 118
  183.                 Width = 145
  184.                 Height = 17
  185.                 Caption = '&Memo'
  186.                 TabOrder = 5
  187.                 OnClick = cbSenderClick
  188.               end
  189.             end
  190.             object eText: TComboBox
  191.               Left = 96
  192.               Top = 8
  193.               Width = 351
  194.               Height = 21
  195.               ItemHeight = 13
  196.               TabOrder = 0
  197.               OnKeyDown = eTextKeyDown
  198.             end
  199.             object mlFolders: TMLVGrid
  200.               Left = 176
  201.               Top = 60
  202.               Width = 273
  203.               Height = 133
  204.               ColCount = 1
  205.               DefaultRowHeight = 16
  206.               DefaultDrawing = False
  207.               FixedCols = 0
  208.               RowCount = 1
  209.               FixedRows = 0
  210.               Options = [goThumbTracking]
  211.               PopupMenu = pmFolders
  212.               TabOrder = 2
  213.               OnKeyDown = mlFoldersKeyDown
  214.               OnMouseDown = mlFoldersMouseDown
  215.               AltDrag = True
  216.               AutoColResize = True
  217.               AutoSearch = True
  218.               MultiSelect = False
  219.               ImmediateSelect = False
  220.               OnDrawItemImage = mlFoldersDrawItemImage
  221.             end
  222.             object cbTarget: TComboBox
  223.               Left = 224
  224.               Top = 36
  225.               Width = 225
  226.               Height = 21
  227.               Style = csDropDownList
  228.               ItemHeight = 13
  229.               ItemIndex = 0
  230.               TabOrder = 3
  231.               Text = 'Selected folders'
  232.               OnChange = cbTargetChange
  233.               OnDropDown = cbTargetDropDown
  234.               Items.Strings = (
  235.                 'Selected folders'
  236.                 'Current account (%s)'
  237.                 'All accounts'
  238.                 'Found messages')
  239.             end
  240.           end
  241.         end
  242.         object tsResult: TTabSheet
  243.           Caption = 'Results'
  244.           object pnMsgListAligner: TPanel
  245.             Tag = 11
  246.             Left = 0
  247.             Top = 0
  248.             Width = 492
  249.             Height = 206
  250.             Align = alClient
  251.             BevelOuter = bvNone
  252.             BorderWidth = 2
  253.             TabOrder = 0
  254.             object hMessages: THeaderControl
  255.               Left = 2
  256.               Top = 2
  257.               Width = 488
  258.               Height = 20
  259.               Hint = 'nograb'
  260.               Sections = <>
  261.               OnMouseDown = hMessagesMouseDown
  262.               OnMouseUp = hMessagesMouseUp
  263.             end
  264.             object MLV: TMessageListView
  265.               Left = 2
  266.               Top = 22
  267.               Width = 488
  268.               Height = 182
  269.               HelpContext = 11013
  270.               Align = alClient
  271.               BorderStyle = bsNone
  272.               ColCount = 10
  273.               DefaultRowHeight = 16
  274.               DefaultDrawing = False
  275.               FixedCols = 0
  276.               RowCount = 1
  277.               FixedRows = 0
  278.               Options = [goThumbTracking]
  279.               PopupMenu = MessagePopup
  280.               TabOrder = 1
  281.               OnDblClick = MLVDblClick
  282.               OnKeyDown = MLVKeyDown
  283.               Sorting = 0
  284.               Threading = mlvtNone
  285.               Header = hMessages
  286.               OnColumnsChange = MLVColumnsChange
  287.               OnListChange = MLVListChange
  288.             end
  289.           end
  290.         end
  291.         object tsOptions: TTabSheet
  292.           Caption = 'Advanced'
  293.           object advBox: TScrollBox
  294.             Left = 0
  295.             Top = 0
  296.             Width = 492
  297.             Height = 206
  298.             VertScrollBar.Tracking = True
  299.             Align = alClient
  300.             BorderStyle = bsNone
  301.             TabOrder = 0
  302.             object lKbytes1: TLabel
  303.               Left = 312
  304.               Top = 128
  305.               Width = 35
  306.               Height = 13
  307.               Caption = 'K bytes'
  308.               Enabled = False
  309.             end
  310.             object lKbytes2: TLabel
  311.               Left = 312
  312.               Top = 152
  313.               Width = 35
  314.               Height = 13
  315.               Caption = 'K bytes'
  316.               Enabled = False
  317.             end
  318.             object lBeforeDMY: TLabel
  319.               Left = 288
  320.               Top = 80
  321.               Width = 64
  322.               Height = 13
  323.               Caption = '(dd/mm/yyyy)'
  324.               Enabled = False
  325.             end
  326.             object lAfterDMY: TLabel
  327.               Left = 288
  328.               Top = 102
  329.               Width = 64
  330.               Height = 13
  331.               Caption = '(dd/mm/yyyy)'
  332.               Enabled = False
  333.             end
  334.             object cbCase: TCheckBox
  335.               Left = 224
  336.               Top = 24
  337.               Width = 225
  338.               Height = 17
  339.               Caption = '&Case sensitive search'
  340.               TabOrder = 13
  341.             end
  342.             object cbAttach: TCheckBox
  343.               Left = 8
  344.               Top = 58
  345.               Width = 209
  346.               Height = 17
  347.               Caption = 'Message &has attachments'
  348.               TabOrder = 3
  349.             end
  350.             object cbReplied: TCheckBox
  351.               Left = 8
  352.               Top = 8
  353.               Width = 209
  354.               Height = 17
  355.               Caption = 'Message is ¬ replied'
  356.               TabOrder = 0
  357.             end
  358.             object cbBefore: TCheckBox
  359.               Left = 8
  360.               Top = 84
  361.               Width = 209
  362.               Height = 17
  363.               Caption = 'Received &BEFORE'
  364.               TabOrder = 4
  365.               OnClick = cbBeforeClick
  366.             end
  367.             object cbAfter: TCheckBox
  368.               Left = 8
  369.               Top = 100
  370.               Width = 209
  371.               Height = 17
  372.               Caption = 'Received &AFTER'
  373.               TabOrder = 6
  374.               OnClick = cbAfterClick
  375.             end
  376.             object cbLarger: TCheckBox
  377.               Left = 8
  378.               Top = 132
  379.               Width = 209
  380.               Height = 17
  381.               Caption = 'Size is &LARGER than'
  382.               TabOrder = 8
  383.               OnClick = cbLargerClick
  384.             end
  385.             object cbSmaller: TCheckBox
  386.               Left = 8
  387.               Top = 148
  388.               Width = 209
  389.               Height = 17
  390.               Caption = 'Size is &SMALLER than'
  391.               TabOrder = 10
  392.               OnClick = cbSmallerClick
  393.             end
  394.             object eSmaller: TXSpinEdit
  395.               Left = 224
  396.               Top = 149
  397.               Width = 83
  398.               Height = 21
  399.               Enabled = False
  400.               TabOrder = 11
  401.               Text = '0'
  402.               MinValue = 0
  403.               MaxValue = 10000000
  404.               Value = 0
  405.               Step = 1
  406.             end
  407.             object eLarger: TXSpinEdit
  408.               Left = 224
  409.               Top = 125
  410.               Width = 83
  411.               Height = 21
  412.               Enabled = False
  413.               TabOrder = 9
  414.               Text = '0'
  415.               MinValue = 0
  416.               MaxValue = 10000000
  417.               Value = 0
  418.               Step = 1
  419.             end
  420.             object cbParked: TCheckBox
  421.               Left = 8
  422.               Top = 41
  423.               Width = 209
  424.               Height = 17
  425.               Caption = 'Message is &parked'
  426.               TabOrder = 2
  427.             end
  428.             object cbUnread: TCheckBox
  429.               Left = 8
  430.               Top = 24
  431.               Width = 209
  432.               Height = 17
  433.               Caption = 'Message is &unread'
  434.               TabOrder = 1
  435.             end
  436.             object cbWords: TCheckBox
  437.               Left = 224
  438.               Top = 40
  439.               Width = 225
  440.               Height = 17
  441.               Caption = 'Search for &whole words only'
  442.               TabOrder = 14
  443.             end
  444.             object meBefore: TMaskEdit
  445.               Left = 224
  446.               Top = 76
  447.               Width = 61
  448.               Height = 21
  449.               Enabled = False
  450.               EditMask = '00/00/0000'
  451.               MaxLength = 10
  452.               TabOrder = 5
  453.               Text = '  .  .    '
  454.             end
  455.             object meAfter: TMaskEdit
  456.               Left = 224
  457.               Top = 100
  458.               Width = 61
  459.               Height = 21
  460.               Enabled = False
  461.               EditMask = '00/00/0000'
  462.               MaxLength = 10
  463.               TabOrder = 7
  464.               Text = '  .  .    '
  465.             end
  466.             object cbRegExp: TCheckBox
  467.               Left = 224
  468.               Top = 57
  469.               Width = 241
  470.               Height = 17
  471.               Caption = '&Regular expressions'
  472.               TabOrder = 15
  473.             end
  474.             object cbFlagged: TCheckBox
  475.               Left = 224
  476.               Top = 8
  477.               Width = 225
  478.               Height = 17
  479.               Caption = 'Message is &flagged'
  480.               TabOrder = 12
  481.             end
  482.             object cbIsColor: TCheckBox
  483.               Left = 8
  484.               Top = 184
  485.               Width = 217
  486.               Height = 17
  487.               Caption = 'Message colour is'
  488.               TabOrder = 16
  489.               OnClick = cbIsColorClick
  490.             end
  491.             object cbColor: TComboBox
  492.               Left = 224
  493.               Top = 182
  494.               Width = 161
  495.               Height = 21
  496.               Style = csDropDownList
  497.               Enabled = False
  498.               ItemHeight = 0
  499.               TabOrder = 17
  500.             end
  501.           end
  502.         end
  503.       end
  504.       object ButtonsPanel: TPanel
  505.         Left = 502
  506.         Top = 2
  507.         Width = 126
  508.         Height = 234
  509.         Align = alRight
  510.         BevelOuter = bvNone
  511.         TabOrder = 1
  512.         object bStart: TButton
  513.           Left = 4
  514.           Top = 20
  515.           Width = 117
  516.           Height = 25
  517.           Caption = 'Start'
  518.           Default = True
  519.           TabOrder = 0
  520.           OnClick = bStartClick
  521.         end
  522.         object bStop: TButton
  523.           Left = 4
  524.           Top = 52
  525.           Width = 117
  526.           Height = 25
  527.           Cancel = True
  528.           Caption = 'S&top'
  529.           Enabled = False
  530.           TabOrder = 1
  531.           OnClick = bStopClick
  532.         end
  533.         object bClose: TButton
  534.           Left = 4
  535.           Top = 116
  536.           Width = 117
  537.           Height = 25
  538.           Cancel = True
  539.           Caption = 'Close'
  540.           TabOrder = 2
  541.           OnClick = bCloseClick
  542.         end
  543.         object bHelp: TButton
  544.           Left = 4
  545.           Top = 84
  546.           Width = 117
  547.           Height = 25
  548.           Caption = '&Help'
  549.           TabOrder = 3
  550.           OnClick = bHelpClick
  551.         end
  552.         object bFollow: TButton
  553.           Left = 4
  554.           Top = 148
  555.           Width = 117
  556.           Height = 25
  557.           Cancel = True
  558.           Caption = '&Follow'
  559.           Enabled = False
  560.           TabOrder = 4
  561.           OnClick = bFollowClick
  562.         end
  563.         object btnVFolder: TButton
  564.           Left = 4
  565.           Top = 180
  566.           Width = 117
  567.           Height = 25
  568.           Caption = 'Virtual Folder...'
  569.           Enabled = False
  570.           TabOrder = 5
  571.           OnClick = btnVFolderClick
  572.         end
  573.       end
  574.     end
  575.   end
  576.   object pnMsgViewAligner: TPanel
  577.     Left = 0
  578.     Top = 242
  579.     Width = 630
  580.     Height = 213
  581.     Align = alClient
  582.     BevelOuter = bvNone
  583.     BorderWidth = 2
  584.     TabOrder = 2
  585.     inline VFrame: TMsgViewFrame
  586.       Left = 2
  587.       Top = 2
  588.       Width = 626
  589.       Height = 209
  590.       Align = alClient
  591.       Constraints.MinHeight = 100
  592.       Constraints.MinWidth = 100
  593.       TabOrder = 0
  594.       inherited pnRece: TPanel
  595.         Top = 160
  596.         Width = 626
  597.         inherited pbRece: TProgressBar
  598.           Width = 624
  599.         end
  600.       end
  601.       inherited pnMsg: TPanel
  602.         Width = 626
  603.         Height = 119
  604.         inherited Split1: TSplitter
  605.           Height = 119
  606.         end
  607.         inherited pnView: TPanel
  608.           Width = 491
  609.           Height = 119
  610.           inherited tsTabs: TTabSet
  611.             Top = 96
  612.             Width = 487
  613.           end
  614.         end
  615.         inherited pnAttachAligner: TPanel
  616.           Height = 119
  617.           inherited lvFiles: TListView
  618.             Height = 115
  619.           end
  620.         end
  621.       end
  622.       inherited pnHeader: TPanel
  623.         Tag = 11
  624.         Width = 626
  625.         BorderWidth = 0
  626.         inherited pnHdrLeft: TPanel
  627.           Left = 2
  628.           Top = 2
  629.           Width = 595
  630.           Height = 37
  631.           inherited eSize: TMemo
  632.             Left = 493
  633.             Height = 37
  634.           end
  635.           inherited gAddr: TAddressGrid
  636.             Width = 457
  637.             Height = 37
  638.             ColWidths = (
  639.               16
  640.               441)
  641.           end
  642.           inherited pnAttachButton: TPanel
  643.             Left = 564
  644.             Height = 37
  645.           end
  646.           inherited pnSecurity: TPanel
  647.             Left = 457
  648.             Height = 37
  649.           end
  650.         end
  651.         inherited pnImage: TPanel
  652.           Left = 597
  653.           Top = 2
  654.           Height = 37
  655.         end
  656.       end
  657.     end
  658.   end
  659.   object AttachImages: TImageList
  660.     Height = 32
  661.     Width = 32
  662.     Left = 232
  663.     Top = 272
  664.   end
  665.   object MessagePopup: TPopupMenu
  666.     OnPopup = MessagePopupPopup
  667.     Left = 328
  668.     Top = 272
  669.     object mmNextUR: TMenuItem
  670.       Tag = 1
  671.       Caption = 'Move to &Next Unread'
  672.       ShortCut = 16605
  673.       Visible = False
  674.       OnClick = MovetoNextunread1Click
  675.     end
  676.     object mmPrevUR: TMenuItem
  677.       Tag = -1
  678.       Caption = 'Move to Pre&vious Unread'
  679.       ShortCut = 16603
  680.       Visible = False
  681.       OnClick = MovetoNextunread1Click
  682.     end
  683.     object MovetoNextunread2: TMenuItem
  684.       Tag = 1
  685.       Caption = 'Move to &Next unread'
  686.       ShortCut = 49191
  687.       OnClick = MovetoNextunread1Click
  688.     end
  689.     object MovetoPreviousunread2: TMenuItem
  690.       Tag = -1
  691.       Caption = '&Move to Previous unread'
  692.       ShortCut = 49189
  693.       OnClick = MovetoNextunread1Click
  694.     end
  695.     object MovetoNextunread8: TMenuItem
  696.       Tag = 1
  697.       Caption = 'Move to &Next unread'
  698.       ShortCut = 16423
  699.       Visible = False
  700.       OnClick = MovetoNextunread1Click
  701.     end
  702.     object MovetoPreviousunread8: TMenuItem
  703.       Tag = -1
  704.       Caption = '&Move to Previous unread'
  705.       ShortCut = 16421
  706.       Visible = False
  707.       OnClick = MovetoNextunread1Click
  708.     end
  709.     object N21: TMenuItem
  710.       Caption = '-'
  711.     end
  712.     object mpCreate: TMenuItem
  713.       Caption = 'Create a Ne&w Message...'
  714.       Default = True
  715.       ShortCut = 16462
  716.       OnClick = mpCreateClick
  717.     end
  718.     object mOpenMessage: TMenuItem
  719.       Caption = '&Open '
  720.       ShortCut = 13
  721.       OnClick = mOpenMessageClick
  722.     end
  723.     object mpReplyA: TMenuItem
  724.       Caption = '&Reply...'
  725.       ShortCut = 16466
  726.       Visible = False
  727.       OnClick = mpReplyAClick
  728.     end
  729.     object mReplyMessage: TMenuItem
  730.       Caption = '&Reply...'
  731.       ShortCut = 16397
  732.       OnClick = mpReplyAClick
  733.     end
  734.     object mFwdMessage: TMenuItem
  735.       Tag = 1
  736.       Caption = '&Forward...'
  737.       ShortCut = 8205
  738.       OnClick = mpReplyAClick
  739.     end
  740.     object mmRedirect: TMenuItem
  741.       Tag = 4
  742.       Caption = 'R&edirect'
  743.       ShortCut = 16453
  744.       OnClick = mpReplyAClick
  745.     end
  746.     object mmThread: TMenuItem
  747.       Caption = '&Thread'
  748.       object mmtCopy: TMenuItem
  749.         Caption = '&Copy'
  750.         ShortCut = 16468
  751.         OnClick = mmtCopyClick
  752.       end
  753.       object mmtMove: TMenuItem
  754.         Tag = 1
  755.         Caption = '&Move'
  756.         ShortCut = 24662
  757.         OnClick = mmtCopyClick
  758.       end
  759.       object mmtDelete: TMenuItem
  760.         Tag = 2
  761.         Caption = '&Delete'
  762.         ShortCut = 24622
  763.         OnClick = mmtCopyClick
  764.       end
  765.       object N22: TMenuItem
  766.         Caption = '-'
  767.       end
  768.       object mmtMarkRead: TMenuItem
  769.         Tag = 3
  770.         Caption = 'Mark as &Read'
  771.         ShortCut = 24653
  772.         OnClick = mmtCopyClick
  773.       end
  774.       object mmtMarkUnread: TMenuItem
  775.         Tag = 4
  776.         Caption = 'Mark as &Unread'
  777.         ShortCut = 24661
  778.         OnClick = mmtCopyClick
  779.       end
  780.       object mmtPark: TMenuItem
  781.         Tag = 5
  782.         Caption = '&Park'
  783.         OnClick = mmtCopyClick
  784.       end
  785.       object mmtUnpark: TMenuItem
  786.         Tag = 6
  787.         Caption = 'Unp&ark'
  788.         OnClick = mmtCopyClick
  789.       end
  790.     end
  791.     object N17: TMenuItem
  792.       Caption = '-'
  793.     end
  794.     object mvCopy: TMenuItem
  795.       Tag = 1
  796.       Caption = '&Copy to Folder...'
  797.       ShortCut = 16451
  798.       OnClick = mvCopyClick
  799.     end
  800.     object mvMove: TMenuItem
  801.       Caption = '&Move to Folder...'
  802.       ShortCut = 16470
  803.       OnClick = mvCopyClick
  804.     end
  805.     object mSaveMessage: TMenuItem
  806.       Caption = '&Save as...'
  807.       ShortCut = 16467
  808.       OnClick = mSaveMessageClick
  809.     end
  810.     object mDelMessageList: TMenuItem
  811.       Caption = '&Delete from List'
  812.       OnClick = mDelMessageListClick
  813.     end
  814.     object mmDelFromBase: TMenuItem
  815.       Caption = '&Delete from Base'
  816.       ShortCut = 16430
  817.       OnClick = mmAltDelClick
  818.     end
  819.     object mmAltDel: TMenuItem
  820.       Tag = 1
  821.       Caption = 'Alternative Delete'
  822.       ShortCut = 8238
  823.       Visible = False
  824.       OnClick = mmAltDelClick
  825.     end
  826.     object mSpecials: TMenuItem
  827.       Caption = 'Specials'
  828.       object mmAddAddress: TMenuItem
  829.         Caption = '&Add sender to Address Book'
  830.         ShortCut = 16471
  831.         OnClick = msAddSenderClick
  832.       end
  833.       object mmDeleteAddress: TMenuItem
  834.         Caption = '&Delete from Address Book'
  835.         ShortCut = 16459
  836.         OnClick = msDelSenderClick
  837.       end
  838.       object mmMakeFilter: TMenuItem
  839.         Caption = '&Create filter...'
  840.         ShortCut = 24646
  841.         OnClick = msCreateFilterClick
  842.       end
  843.       object mmFindReply: TMenuItem
  844.         Caption = '&Open reply'
  845.         ShortCut = 16392
  846.         OnClick = msOpenReplyClick
  847.       end
  848.       object mvPGPDecrypt: TMenuItem
  849.         Caption = 'P&GP Decrypt'
  850.         ShortCut = 24644
  851.       end
  852.       object N4: TMenuItem
  853.         Caption = '-'
  854.       end
  855.       object mmMarkSpam: TMenuItem
  856.         Tag = 1
  857.         Caption = 'Mark as Junk'
  858.         OnClick = mMarkSPAMClick
  859.       end
  860.       object mmMarkHAM: TMenuItem
  861.         Caption = 'Mark as NOT Junk'
  862.         OnClick = mMarkSPAMClick
  863.       end
  864.       object N29: TMenuItem
  865.         Caption = '-'
  866.       end
  867.       object mmPark: TMenuItem
  868.         Caption = '&Park'
  869.         ShortCut = 16458
  870.         OnClick = mmParkClick
  871.       end
  872.       object mmUnpark: TMenuItem
  873.         Tag = 1
  874.         Caption = '&Unpark'
  875.         ShortCut = 16452
  876.         OnClick = mmParkClick
  877.       end
  878.       object N32: TMenuItem
  879.         Caption = '-'
  880.       end
  881.       object ReplyQuotingselectedtext1: TMenuItem
  882.         Tag = 7
  883.         Caption = 'Reply &Quoting selected text'
  884.         ShortCut = 115
  885.         OnClick = mpReplyAClick
  886.       end
  887.       object Replywithoutquotation1: TMenuItem
  888.         Tag = 5
  889.         Caption = 'Reply &without quotation'
  890.         ShortCut = 8307
  891.         OnClick = mpReplyAClick
  892.       end
  893.       object ReplytotheSender1: TMenuItem
  894.         Tag = 6
  895.         Caption = 'Reply to the &Sender'
  896.         ShortCut = 16499
  897.         OnClick = mpReplyAClick
  898.       end
  899.       object mlAlternativeForward: TMenuItem
  900.         Tag = 10
  901.         Caption = 'Alternative &Forward'
  902.         ShortCut = 41076
  903.         OnClick = mpReplyAClick
  904.       end
  905.     end
  906.     object N5: TMenuItem
  907.       Caption = '-'
  908.     end
  909.     object mmMarkunread: TMenuItem
  910.       Caption = 'Mark as &Unread'
  911.       ShortCut = 16469
  912.       OnClick = mmMarkunreadClick
  913.     end
  914.     object mmMarkRead: TMenuItem
  915.       Tag = 1
  916.       Caption = 'Mark &as Read'
  917.       ShortCut = 16461
  918.       OnClick = mmMarkunreadClick
  919.     end
  920.     object mmFlags: TMenuItem
  921.       Caption = '&Flags'
  922.       Visible = False
  923.       object mmf_Flagged: TMenuItem
  924.         Tag = 2
  925.         Caption = '&Flagged'
  926.         OnClick = mf_FlaggedClick
  927.       end
  928.       object mmf_Replied: TMenuItem
  929.         Tag = 1
  930.         Caption = '&Replied'
  931.         OnClick = mf_FlaggedClick
  932.       end
  933.       object mmf_Forwarded: TMenuItem
  934.         Tag = 3
  935.         Caption = 'F&orwarded/Redirected'
  936.         OnClick = mf_FlaggedClick
  937.       end
  938.       object N26: TMenuItem
  939.         Caption = '-'
  940.         OnClick = mf_FlaggedClick
  941.       end
  942.       object mmf_NormalPty: TMenuItem
  943.         Tag = 5
  944.         Caption = '&Normal priority'
  945.         GroupIndex = 10
  946.         RadioItem = True
  947.         OnClick = mf_FlaggedClick
  948.       end
  949.       object mmf_HighPty: TMenuItem
  950.         Tag = 7
  951.         Caption = '&High priority'
  952.         GroupIndex = 10
  953.         RadioItem = True
  954.         OnClick = mf_FlaggedClick
  955.       end
  956.       object mmf_LowPty: TMenuItem
  957.         Tag = 6
  958.         Caption = '&Low priority'
  959.         GroupIndex = 10
  960.         RadioItem = True
  961.         OnClick = mf_FlaggedClick
  962.       end
  963.     end
  964.     object mmColors: TMenuItem
  965.       Caption = 'Colour &Group'
  966.     end
  967.     object mmRemindLater: TMenuItem
  968.       Caption = 'Remind later'
  969.     end
  970.     object N27: TMenuItem
  971.       Caption = '-'
  972.     end
  973.     object mlSelectAll: TMenuItem
  974.       Caption = 'Selec&t all'
  975.       ShortCut = 16449
  976.       OnClick = mlSelectAllClick
  977.     end
  978.     object mlMovedown: TMenuItem
  979.       Caption = 'Move down'
  980.       ShortCut = 32
  981.       Visible = False
  982.       OnClick = mlMovedownClick
  983.     end
  984.     object Popup3: TMenuItem
  985.       Tag = 2
  986.       Caption = 'Popup'
  987.       ShortCut = 32889
  988.       Visible = False
  989.       OnClick = Popup1Click
  990.     end
  991.     object mFindWord: TMenuItem
  992.       Caption = 'Find a word...'
  993.       ShortCut = 16454
  994.       OnClick = mFindWordClick
  995.     end
  996.     object Findnextword1: TMenuItem
  997.       Caption = 'Find next word'
  998.       ShortCut = 114
  999.       Visible = False
  1000.       OnClick = mvFindNextWordClick
  1001.     end
  1002.     object mvFindNextWord: TMenuItem
  1003.       Caption = 'Find next word'
  1004.       ShortCut = 16460
  1005.       OnClick = mvFindNextWordClick
  1006.     end
  1007.   end
  1008.   object ViewMenu: TMainMenu
  1009.     Left = 264
  1010.     Top = 272
  1011.     object mmMessage: TMenuItem
  1012.       Caption = '&Message'
  1013.       OnClick = mmMessageClick
  1014.       object mvNew: TMenuItem
  1015.         Caption = '&New'
  1016.         ShortCut = 16462
  1017.         OnClick = mpCreateClick
  1018.       end
  1019.       object mvReply: TMenuItem
  1020.         Caption = 'Repl&y...'
  1021.         ShortCut = 16397
  1022.         OnClick = mpReplyAClick
  1023.       end
  1024.       object Reply1: TMenuItem
  1025.         Caption = '&Reply'
  1026.         ShortCut = 16500
  1027.         Visible = False
  1028.         OnClick = mpReplyAClick
  1029.       end
  1030.       object mvReplyAll: TMenuItem
  1031.         Tag = 2
  1032.         Caption = 'Reply to &All'
  1033.         ShortCut = 24589
  1034.         OnClick = mpReplyAClick
  1035.       end
  1036.       object ReplytoAll1: TMenuItem
  1037.         Tag = 2
  1038.         Caption = 'Reply to &All'
  1039.         ShortCut = 24692
  1040.         Visible = False
  1041.         OnClick = mpReplyAClick
  1042.       end
  1043.       object mvForward: TMenuItem
  1044.         Tag = 1
  1045.         Caption = 'For&ward...'
  1046.         ShortCut = 8205
  1047.         OnClick = mpReplyAClick
  1048.       end
  1049.       object Forward1: TMenuItem
  1050.         Tag = 1
  1051.         Caption = 'For&ward'
  1052.         ShortCut = 8308
  1053.         Visible = False
  1054.         OnClick = mpReplyAClick
  1055.       end
  1056.       object mvResend: TMenuItem
  1057.         Caption = 'R&e-send'
  1058.         ShortCut = 24612
  1059.         OnClick = mvResendClick
  1060.       end
  1061.       object Resend1: TMenuItem
  1062.         Caption = 'Re-s&end'
  1063.         ShortCut = 8309
  1064.         Visible = False
  1065.         OnClick = mvResendClick
  1066.       end
  1067.       object mvRedirect: TMenuItem
  1068.         Tag = 4
  1069.         Caption = 'Red&irect'
  1070.         ShortCut = 16453
  1071.         OnClick = mpReplyAClick
  1072.       end
  1073.       object Redirect1: TMenuItem
  1074.         Tag = 4
  1075.         Caption = 'Redirec&t'
  1076.         ShortCut = 16501
  1077.         Visible = False
  1078.       end
  1079.       object N28: TMenuItem
  1080.         Caption = '-'
  1081.       end
  1082.       object mCopyToFolder: TMenuItem
  1083.         Tag = 1
  1084.         Caption = '&Copy to folder...'
  1085.         OnClick = mvCopyClick
  1086.       end
  1087.       object mMoveToFolder: TMenuItem
  1088.         Caption = '&Move to folder...'
  1089.         OnClick = mvCopyClick
  1090.       end
  1091.       object mvSaveAs: TMenuItem
  1092.         Caption = '&Save as...'
  1093.         ShortCut = 16467
  1094.         OnClick = mSaveMessageClick
  1095.       end
  1096.       object SaveAs1: TMenuItem
  1097.         Caption = '&Save As...'
  1098.         ShortCut = 32884
  1099.         Visible = False
  1100.         OnClick = mSaveMessageClick
  1101.       end
  1102.       object mmDeleteList: TMenuItem
  1103.         Caption = 'Delete from the &List'
  1104.         OnClick = mDelMessageListClick
  1105.       end
  1106.       object mAltDel: TMenuItem
  1107.         Tag = 1
  1108.         Caption = '&Delete from Base'
  1109.         ShortCut = 8238
  1110.         Visible = False
  1111.         OnClick = mmAltDelClick
  1112.       end
  1113.       object mmDeleteBase: TMenuItem
  1114.         Caption = '&Delete from Base'
  1115.         ShortCut = 16430
  1116.         OnClick = mmAltDelClick
  1117.       end
  1118.       object mvPrint: TMenuItem
  1119.         Caption = '&Print...'
  1120.         ShortCut = 16464
  1121.         OnClick = mvPrintClick
  1122.       end
  1123.       object mAttachments: TMenuItem
  1124.         Caption = 'Attachments'
  1125.         Visible = False
  1126.         object mAttOpen: TMenuItem
  1127.           Tag = 1
  1128.           Caption = '&Open...'
  1129.         end
  1130.         object mAttSave: TMenuItem
  1131.           Caption = '&Save...'
  1132.         end
  1133.         object mAttDelete: TMenuItem
  1134.           Tag = 3
  1135.           Caption = '&Delete'
  1136.         end
  1137.         object mAttPrint: TMenuItem
  1138.           Tag = 2
  1139.           Caption = '&Print...'
  1140.         end
  1141.         object mAttImportKey: TMenuItem
  1142.           Tag = 4
  1143.           Caption = '&Import Key'
  1144.         end
  1145.         object N31: TMenuItem
  1146.           Caption = '-'
  1147.         end
  1148.         object mAttSaveAllAttachments: TMenuItem
  1149.           Tag = 44
  1150.           Caption = 'Save &All Attachments...'
  1151.         end
  1152.       end
  1153.       object N1: TMenuItem
  1154.         Caption = '-'
  1155.       end
  1156.       object mvMarkUnread: TMenuItem
  1157.         Caption = 'Mark as &Unread'
  1158.         ShortCut = 16469
  1159.         OnClick = mmMarkunreadClick
  1160.       end
  1161.       object mvMarkRead: TMenuItem
  1162.         Tag = 1
  1163.         Caption = 'Mark as &Read'
  1164.         ShortCut = 16461
  1165.         OnClick = mmMarkunreadClick
  1166.       end
  1167.       object msPark: TMenuItem
  1168.         Caption = '&Park'
  1169.         ShortCut = 16458
  1170.         OnClick = mmParkClick
  1171.       end
  1172.       object msUnpark: TMenuItem
  1173.         Tag = 1
  1174.         Caption = '&Unpark'
  1175.         ShortCut = 16452
  1176.         OnClick = mmParkClick
  1177.       end
  1178.       object mFlags: TMenuItem
  1179.         Caption = '&Flags'
  1180.         object mf_Flagged: TMenuItem
  1181.           Tag = 2
  1182.           Caption = '&Flagged'
  1183.           ShortCut = 16455
  1184.           OnClick = mf_FlaggedClick
  1185.         end
  1186.         object mf_Replied: TMenuItem
  1187.           Tag = 1
  1188.           Caption = '&Replied'
  1189.           OnClick = mf_FlaggedClick
  1190.         end
  1191.         object mf_Forwarded: TMenuItem
  1192.           Tag = 3
  1193.           Caption = 'F&orwarded/Redirected'
  1194.           OnClick = mf_FlaggedClick
  1195.         end
  1196.         object N12: TMenuItem
  1197.           Caption = '-'
  1198.           OnClick = mf_FlaggedClick
  1199.         end
  1200.         object mf_NormalPty: TMenuItem
  1201.           Tag = 5
  1202.           Caption = '&Normal priority'
  1203.           GroupIndex = 10
  1204.           RadioItem = True
  1205.           OnClick = mf_FlaggedClick
  1206.         end
  1207.         object mf_HighPty: TMenuItem
  1208.           Tag = 7
  1209.           Caption = '&High priority'
  1210.           GroupIndex = 10
  1211.           RadioItem = True
  1212.           OnClick = mf_FlaggedClick
  1213.         end
  1214.         object mf_LowPty: TMenuItem
  1215.           Tag = 6
  1216.           Caption = '&Low priority'
  1217.           GroupIndex = 10
  1218.           RadioItem = True
  1219.           OnClick = mf_FlaggedClick
  1220.         end
  1221.       end
  1222.       object mColors: TMenuItem
  1223.         Caption = 'Colour &Group'
  1224.       end
  1225.       object N9: TMenuItem
  1226.         Caption = '-'
  1227.       end
  1228.       object mvExit: TMenuItem
  1229.         Caption = 'E&xit'
  1230.         ShortCut = 27
  1231.         OnClick = mvExitClick
  1232.       end
  1233.     end
  1234.     object mmEdit: TMenuItem
  1235.       Caption = '&Edit'
  1236.       OnClick = mmEditClick
  1237.       object meCopy: TMenuItem
  1238.         Tag = 1
  1239.         Caption = '&Copy'
  1240.         OnClick = meCopyClick
  1241.       end
  1242.       object meCopyTo: TMenuItem
  1243.         Tag = 1
  1244.         Caption = 'Copy &to...'
  1245.         OnClick = meCopyToClick
  1246.       end
  1247.       object N6: TMenuItem
  1248.         Caption = '-'
  1249.       end
  1250.       object meFindWord: TMenuItem
  1251.         Caption = '&Find text...'
  1252.         ShortCut = 16454
  1253.         OnClick = mFindWordClick
  1254.       end
  1255.       object meFindWordA: TMenuItem
  1256.         Caption = 'Find &next'
  1257.         ShortCut = 114
  1258.         Visible = False
  1259.         OnClick = mvFindNextWordClick
  1260.       end
  1261.       object meFindWordB: TMenuItem
  1262.         Caption = 'Find &next'
  1263.         ShortCut = 16460
  1264.         OnClick = mvFindNextWordClick
  1265.       end
  1266.       object N33: TMenuItem
  1267.         Caption = '-'
  1268.       end
  1269.       object mOldSearch: TMenuItem
  1270.         Caption = '&Use previous conditions'
  1271.       end
  1272.     end
  1273.     object mmSpecials: TMenuItem
  1274.       Caption = '&Specials'
  1275.       OnClick = mmSpecialsClick
  1276.       object MovetoNextunread1: TMenuItem
  1277.         Tag = 1
  1278.         Caption = 'Move to &Next unread'
  1279.         ShortCut = 49191
  1280.         OnClick = MovetoNextunread1Click
  1281.       end
  1282.       object MovetoPreviousunread1: TMenuItem
  1283.         Tag = -1
  1284.         Caption = '&Move to Previous unread'
  1285.         ShortCut = 49189
  1286.         OnClick = MovetoNextunread1Click
  1287.       end
  1288.       object MovetoNextunread7: TMenuItem
  1289.         Tag = 1
  1290.         Caption = 'Move to &Next unread'
  1291.         ShortCut = 16605
  1292.         Visible = False
  1293.         OnClick = MovetoNextunread1Click
  1294.       end
  1295.       object MovetoPreviousunread7: TMenuItem
  1296.         Tag = -1
  1297.         Caption = '&Move to Previous unread'
  1298.         ShortCut = 16603
  1299.         Visible = False
  1300.         OnClick = MovetoNextunread1Click
  1301.       end
  1302.       object N13: TMenuItem
  1303.         Caption = '-'
  1304.       end
  1305.       object msAddSender: TMenuItem
  1306.         Caption = '&Add sender to Address Book'
  1307.         ShortCut = 16471
  1308.         OnClick = msAddSenderClick
  1309.       end
  1310.       object msDelSender: TMenuItem
  1311.         Caption = '&Delete from Address Book'
  1312.         ShortCut = 16459
  1313.         OnClick = msDelSenderClick
  1314.       end
  1315.       object msCreateFilter: TMenuItem
  1316.         Caption = '&Create filter...'
  1317.         ShortCut = 24646
  1318.         OnClick = msCreateFilterClick
  1319.       end
  1320.       object msOpenReply: TMenuItem
  1321.         Caption = '&Open reply'
  1322.         ShortCut = 16392
  1323.         OnClick = msOpenReplyClick
  1324.       end
  1325.       object mRemindLater: TMenuItem
  1326.         Caption = 'Remind later'
  1327.       end
  1328.       object N3: TMenuItem
  1329.         Caption = '-'
  1330.       end
  1331.       object mMarkSPAM: TMenuItem
  1332.         Tag = 1
  1333.         Caption = 'Mark as Junk'
  1334.         OnClick = mMarkSPAMClick
  1335.       end
  1336.       object mMarkHAM: TMenuItem
  1337.         Caption = 'Mark as NOT Junk'
  1338.         OnClick = mMarkSPAMClick
  1339.       end
  1340.       object N25: TMenuItem
  1341.         Caption = '-'
  1342.       end
  1343.       object msReplySelected: TMenuItem
  1344.         Tag = 7
  1345.         Caption = 'Reply &Quoting selected text'
  1346.         ShortCut = 115
  1347.         OnClick = mpReplyAClick
  1348.       end
  1349.       object msReplyNoQuotes: TMenuItem
  1350.         Tag = 5
  1351.         Caption = 'Reply &without quotation'
  1352.         ShortCut = 8307
  1353.         OnClick = mpReplyAClick
  1354.       end
  1355.       object msReplySender: TMenuItem
  1356.         Tag = 6
  1357.         Caption = 'Reply to the &Sender'
  1358.         ShortCut = 16499
  1359.         OnClick = mpReplyAClick
  1360.       end
  1361.       object mAltForward: TMenuItem
  1362.         Tag = 10
  1363.         Caption = 'Alternative &Forward'
  1364.         ShortCut = 41076
  1365.         OnClick = mpReplyAClick
  1366.       end
  1367.       object N2: TMenuItem
  1368.         Caption = '-'
  1369.       end
  1370.       object mViewsource: TMenuItem
  1371.         Caption = '&View source'
  1372.         ShortCut = 120
  1373.         OnClick = mViewsourceClick
  1374.       end
  1375.       object N36: TMenuItem
  1376.         Caption = '-'
  1377.       end
  1378.       object mMailList: TMenuItem
  1379.         Caption = '&Mailing list'
  1380.         object mlmGetHelp: TMenuItem
  1381.           Tag = 1
  1382.           Caption = '&Get help'
  1383.         end
  1384.         object mlmUnsubscribe: TMenuItem
  1385.           Tag = 2
  1386.           Caption = '&Unsubscribe'
  1387.         end
  1388.         object mlmSubscribe: TMenuItem
  1389.           Tag = 3
  1390.           Caption = '&Subscribe'
  1391.         end
  1392.         object mlmPost: TMenuItem
  1393.           Tag = 4
  1394.           Caption = '&Post message'
  1395.         end
  1396.         object mlmViewArchive: TMenuItem
  1397.           Tag = 6
  1398.           Caption = '&View archive'
  1399.         end
  1400.         object mlmContactListOwner: TMenuItem
  1401.           Tag = 5
  1402.           Caption = '&Contact List Owner'
  1403.         end
  1404.       end
  1405.       object N23: TMenuItem
  1406.         Caption = '-'
  1407.       end
  1408.       object mmFollow: TMenuItem
  1409.         Caption = 'Follow'
  1410.         OnClick = bFollowClick
  1411.       end
  1412.     end
  1413.     object mSecurity: TMenuItem
  1414.       Caption = '&Privacy'
  1415.       OnClick = mSecurityClick
  1416.       object VerifySignature1: TMenuItem
  1417.         Caption = '&Verify Signature'
  1418.         ShortCut = 24643
  1419.       end
  1420.       object Decrypt1: TMenuItem
  1421.         Tag = 1
  1422.         Caption = '&Decrypt'
  1423.         ShortCut = 24644
  1424.       end
  1425.       object ImportKeyCertificate1: TMenuItem
  1426.         Tag = 2
  1427.         Caption = '&Import Key/Certificate'
  1428.       end
  1429.     end
  1430.     object mmView: TMenuItem
  1431.       Caption = '&View'
  1432.       OnClick = mmViewClick
  1433.       object mmfDisplay: TMenuItem
  1434.         Caption = '&Display'
  1435.         OnClick = mmfDisplayClick
  1436.         object mmfAll: TMenuItem
  1437.           Caption = '&All messages'
  1438.           GroupIndex = 8
  1439.           RadioItem = True
  1440.           ShortCut = 16571
  1441.           OnClick = mmfAllClick
  1442.         end
  1443.         object mmfUnread: TMenuItem
  1444.           Caption = 'Only &Unread messages'
  1445.           GroupIndex = 20
  1446.           RadioItem = True
  1447.           OnClick = mmfUnreadClick
  1448.         end
  1449.         object mmfRead: TMenuItem
  1450.           Tag = 1
  1451.           Caption = 'Only &Read messages'
  1452.           GroupIndex = 20
  1453.           RadioItem = True
  1454.           OnClick = mmfUnreadClick
  1455.         end
  1456.         object mmfFlagged: TMenuItem
  1457.           Tag = 6
  1458.           Caption = 'Only &Flagged messages'
  1459.           GroupIndex = 20
  1460.           OnClick = mmfUnreadClick
  1461.         end
  1462.         object mmfUnFlagged: TMenuItem
  1463.           Tag = 7
  1464.           Caption = 'Only Non-f&lagged messages'
  1465.           GroupIndex = 20
  1466.           OnClick = mmfUnreadClick
  1467.         end
  1468.         object mmfParked: TMenuItem
  1469.           Tag = 2
  1470.           Caption = 'Only &Parked messages'
  1471.           GroupIndex = 21
  1472.           RadioItem = True
  1473.           OnClick = mmfUnreadClick
  1474.         end
  1475.         object mmfUnparked: TMenuItem
  1476.           Tag = 3
  1477.           Caption = 'Only U&nparked messages'
  1478.           GroupIndex = 21
  1479.           RadioItem = True
  1480.           OnClick = mmfUnreadClick
  1481.         end
  1482.         object mmfAttach: TMenuItem
  1483.           Tag = 4
  1484.           Caption = 'Only messages with &Attachments'
  1485.           GroupIndex = 22
  1486.           RadioItem = True
  1487.           OnClick = mmfUnreadClick
  1488.         end
  1489.         object mmfNoAttach: TMenuItem
  1490.           Tag = 5
  1491.           Caption = 'Only messages &without Attachments'
  1492.           GroupIndex = 22
  1493.           RadioItem = True
  1494.           OnClick = mmfUnreadClick
  1495.         end
  1496.         object N19: TMenuItem
  1497.           Caption = '-'
  1498.           GroupIndex = 22
  1499.         end
  1500.         object mmfAdvanced: TMenuItem
  1501.           Caption = 'Ad&vanced filtering...'
  1502.           GroupIndex = 23
  1503.           OnClick = mmfAdvancedClick
  1504.         end
  1505.       end
  1506.       object mmsSort: TMenuItem
  1507.         Caption = '&Sort by'
  1508.         OnClick = mmsSortClick
  1509.         object mmsReceived: TMenuItem
  1510.           Tag = 6
  1511.           Caption = '&Received time'
  1512.           GroupIndex = 10
  1513.           RadioItem = True
  1514.           ShortCut = 16433
  1515.           OnClick = mmsReceivedClick
  1516.         end
  1517.         object mmsCreation: TMenuItem
  1518.           Tag = 5
  1519.           Caption = '&Creation time'
  1520.           GroupIndex = 10
  1521.           RadioItem = True
  1522.           ShortCut = 16434
  1523.           OnClick = mmsReceivedClick
  1524.         end
  1525.         object mmsSize: TMenuItem
  1526.           Tag = 9
  1527.           Caption = 'Si&ze'
  1528.           GroupIndex = 10
  1529.           RadioItem = True
  1530.           ShortCut = 16435
  1531.           OnClick = mmsReceivedClick
  1532.         end
  1533.         object mmsSender: TMenuItem
  1534.           Tag = 2
  1535.           Caption = '&From'
  1536.           GroupIndex = 10
  1537.           RadioItem = True
  1538.           ShortCut = 16436
  1539.           OnClick = mmsReceivedClick
  1540.         end
  1541.         object mmsRecipient: TMenuItem
  1542.           Tag = 3
  1543.           Caption = '&To'
  1544.           GroupIndex = 10
  1545.           RadioItem = True
  1546.           ShortCut = 16437
  1547.           OnClick = mmsReceivedClick
  1548.         end
  1549.         object mmsSubject: TMenuItem
  1550.           Tag = 4
  1551.           Caption = '&Subject'
  1552.           GroupIndex = 10
  1553.           RadioItem = True
  1554.           ShortCut = 16438
  1555.           OnClick = mmsReceivedClick
  1556.         end
  1557.         object mmsFlags: TMenuItem
  1558.           Tag = 1
  1559.           Caption = '&Message Flags'
  1560.           GroupIndex = 10
  1561.           RadioItem = True
  1562.           ShortCut = 16439
  1563.           OnClick = mmsReceivedClick
  1564.         end
  1565.         object mmsAttachment: TMenuItem
  1566.           Tag = 8
  1567.           Caption = '&Attachment presence'
  1568.           GroupIndex = 10
  1569.           RadioItem = True
  1570.           ShortCut = 16440
  1571.           OnClick = mmsReceivedClick
  1572.         end
  1573.         object mmsParking: TMenuItem
  1574.           Tag = 9
  1575.           Caption = '&Parking/Draft flag'
  1576.           GroupIndex = 10
  1577.           RadioItem = True
  1578.           ShortCut = 16441
  1579.           OnClick = mmsReceivedClick
  1580.         end
  1581.         object N16: TMenuItem
  1582.           Caption = '-'
  1583.           GroupIndex = 11
  1584.         end
  1585.         object mmsDescending: TMenuItem
  1586.           Caption = '&Descending order'
  1587.           GroupIndex = 11
  1588.           ShortCut = 16432
  1589.           OnClick = mmsDescendingClick
  1590.         end
  1591.       end
  1592.       object mmtThread: TMenuItem
  1593.         Caption = '&View threads by'
  1594.         OnClick = mmtThreadClick
  1595.         object mmtNone: TMenuItem
  1596.           Caption = '&None'
  1597.           GroupIndex = 12
  1598.           RadioItem = True
  1599.           ShortCut = 32816
  1600.           OnClick = mmtNoneClick
  1601.         end
  1602.         object N18: TMenuItem
  1603.           Caption = '-'
  1604.           GroupIndex = 12
  1605.         end
  1606.         object mmtStandard: TMenuItem
  1607.           Tag = 1
  1608.           Caption = '&References (standard)'
  1609.           GroupIndex = 12
  1610.           RadioItem = True
  1611.           ShortCut = 32817
  1612.           OnClick = mmtNoneClick
  1613.         end
  1614.         object mmtSubject: TMenuItem
  1615.           Tag = 2
  1616.           Caption = '&Subject'
  1617.           GroupIndex = 12
  1618.           RadioItem = True
  1619.           ShortCut = 32818
  1620.           OnClick = mmtNoneClick
  1621.         end
  1622.         object mmtFrom: TMenuItem
  1623.           Tag = 3
  1624.           Caption = '&From'
  1625.           GroupIndex = 12
  1626.           RadioItem = True
  1627.           ShortCut = 32819
  1628.           OnClick = mmtNoneClick
  1629.         end
  1630.         object mmtTo: TMenuItem
  1631.           Tag = 4
  1632.           Caption = '&To'
  1633.           GroupIndex = 12
  1634.           RadioItem = True
  1635.           ShortCut = 32820
  1636.           OnClick = mmtNoneClick
  1637.         end
  1638.       end
  1639.       object mmHeaderMenu: TMenuItem
  1640.         Caption = 'Message &Header'
  1641.         GroupIndex = 11
  1642.         OnClick = mmHeaderMenuClick
  1643.       end
  1644.       object mvAttached: TMenuItem
  1645.         Caption = '&Attached files'
  1646.         GroupIndex = 11
  1647.         OnClick = mvAttachedClick
  1648.         object ShowasaPane1: TMenuItem
  1649.           Caption = 'Show as a &Pane'
  1650.           GroupIndex = 2
  1651.           RadioItem = True
  1652.           OnClick = PaneontheTop1Click
  1653.         end
  1654.         object ShowasaButton1: TMenuItem
  1655.           Tag = 1
  1656.           Caption = 'Show as a &Button'
  1657.           GroupIndex = 2
  1658.           RadioItem = True
  1659.           OnClick = PaneontheTop1Click
  1660.         end
  1661.         object Hide1: TMenuItem
  1662.           Tag = 2
  1663.           Caption = '&Hide'
  1664.           GroupIndex = 2
  1665.           RadioItem = True
  1666.           OnClick = PaneontheTop1Click
  1667.         end
  1668.         object N8: TMenuItem
  1669.           Tag = -1
  1670.           Caption = '-'
  1671.           GroupIndex = 2
  1672.           OnClick = PaneontheTop1Click
  1673.         end
  1674.         object Largeicons1: TMenuItem
  1675.           Caption = '&Large icons'
  1676.           Checked = True
  1677.           GroupIndex = 3
  1678.           RadioItem = True
  1679.           OnClick = PaneontheTop1Click
  1680.         end
  1681.         object Smallicons1: TMenuItem
  1682.           Tag = 1
  1683.           Caption = '&Small icons'
  1684.           GroupIndex = 3
  1685.           RadioItem = True
  1686.           OnClick = PaneontheTop1Click
  1687.         end
  1688.         object N10: TMenuItem
  1689.           Tag = -1
  1690.           Caption = '-'
  1691.           GroupIndex = 3
  1692.           OnClick = PaneontheTop1Click
  1693.         end
  1694.         object PaneontheLeft1: TMenuItem
  1695.           Caption = 'Pane on the L&eft'
  1696.           GroupIndex = 4
  1697.           RadioItem = True
  1698.           OnClick = PaneontheTop1Click
  1699.         end
  1700.         object PaneontheBottom1: TMenuItem
  1701.           Tag = 3
  1702.           Caption = 'Pane on the &Bottom'
  1703.           GroupIndex = 4
  1704.           RadioItem = True
  1705.           OnClick = PaneontheTop1Click
  1706.         end
  1707.         object PaneontheRight1: TMenuItem
  1708.           Tag = 1
  1709.           Caption = 'Pane on the &Right'
  1710.           GroupIndex = 4
  1711.           RadioItem = True
  1712.           OnClick = PaneontheTop1Click
  1713.         end
  1714.         object PaneontheTop1: TMenuItem
  1715.           Tag = 2
  1716.           Caption = 'Pane on the &Top'
  1717.           GroupIndex = 4
  1718.           RadioItem = True
  1719.           OnClick = PaneontheTop1Click
  1720.         end
  1721.       end
  1722.       object mmColumns: TMenuItem
  1723.         Caption = '&Columns...'
  1724.         GroupIndex = 11
  1725.         OnClick = mmColumnsClick
  1726.       end
  1727.       object mShowKludges: TMenuItem
  1728.         Caption = 'RFC-&822 headers'
  1729.         GroupIndex = 11
  1730.         ShortCut = 24651
  1731.         OnClick = mShowKludgesClick
  1732.       end
  1733.       object N34: TMenuItem
  1734.         Caption = '-'
  1735.         GroupIndex = 11
  1736.       end
  1737.       object mEditShortcuts: TMenuItem
  1738.         Caption = '&Edit Shortcut Keys'
  1739.         GroupIndex = 11
  1740.         ShortCut = 32891
  1741.         OnClick = mEditShortcutsClick
  1742.       end
  1743.       object N14: TMenuItem
  1744.         Caption = '-'
  1745.         GroupIndex = 11
  1746.       end
  1747.       object mmXlat: TMenuItem
  1748.         Caption = 'Charact&er set'
  1749.         GroupIndex = 11
  1750.         object mtNone: TMenuItem
  1751.           Caption = '&None'
  1752.           GroupIndex = 11
  1753.           RadioItem = True
  1754.         end
  1755.         object N20: TMenuItem
  1756.           Caption = '-'
  1757.           GroupIndex = 11
  1758.         end
  1759.         object N7: TMenuItem
  1760.           Caption = '-'
  1761.           GroupIndex = 12
  1762.         end
  1763.         object mAutodetect: TMenuItem
  1764.           Caption = '&Auto-detect'
  1765.           GroupIndex = 12
  1766.           ShortCut = 32821
  1767.           OnClick = mAutodetectClick
  1768.         end
  1769.         object mSetAsDeafault: TMenuItem
  1770.           Caption = '&Set as default'
  1771.           GroupIndex = 12
  1772.           OnClick = mSetAsDeafaultClick
  1773.         end
  1774.       end
  1775.     end
  1776.   end
  1777.   object pmFolders: TPopupMenu
  1778.     Left = 500
  1779.     Top = 168
  1780.     object mfSelectAll: TMenuItem
  1781.       Tag = 1
  1782.       Caption = '&Select All'
  1783.       ShortCut = 16449
  1784.       OnClick = mfSelectAllClick
  1785.     end
  1786.     object mfUnselectAll: TMenuItem
  1787.       Caption = '&Unselect All'
  1788.       ShortCut = 16469
  1789.       OnClick = mfSelectAllClick
  1790.     end
  1791.     object mInvertAll: TMenuItem
  1792.       Tag = -1
  1793.       Caption = '&Invert selection'
  1794.       ShortCut = 16466
  1795.       OnClick = mInvertAllClick
  1796.     end
  1797.     object N15: TMenuItem
  1798.       Caption = '-'
  1799.     end
  1800.     object mSelectAccount: TMenuItem
  1801.       Tag = 1
  1802.       Caption = 'Select current Account'
  1803.       ShortCut = 16452
  1804.       OnClick = mSelectAccountClick
  1805.     end
  1806.     object mUnSelectAccount: TMenuItem
  1807.       Caption = 'Unselect current Account'
  1808.       ShortCut = 16463
  1809.       OnClick = mSelectAccountClick
  1810.     end
  1811.     object mInvertAccount: TMenuItem
  1812.       Tag = -1
  1813.       Caption = 'Invert current account'
  1814.       ShortCut = 16453
  1815.       OnClick = mSelectAccountClick
  1816.     end
  1817.     object N11: TMenuItem
  1818.       Caption = '-'
  1819.     end
  1820.     object mfSelectBranch: TMenuItem
  1821.       Tag = 1
  1822.       Caption = 'Select including sub-folders'
  1823.       ShortCut = 16467
  1824.       OnClick = mfSelectBranchClick
  1825.     end
  1826.     object mfUnSelectBranch: TMenuItem
  1827.       Caption = 'Unselect including sub-folders'
  1828.       ShortCut = 16457
  1829.       OnClick = mfSelectBranchClick
  1830.     end
  1831.     object mInvertBranch: TMenuItem
  1832.       Tag = -1
  1833.       Caption = 'Invert branch selection'
  1834.       ShortCut = 16471
  1835.       OnClick = mfSelectBranchClick
  1836.     end
  1837.   end
  1838.   object MenuNavigator: TMenuNavigator
  1839.     Left = 400
  1840.     Top = 410
  1841.   end
  1842. end
  1843.